﻿Module Common
    Friend AdminInfo As dooll.Common.AdminInfo
    Friend DbManage As dooll.Data.MsSql

    Friend Sub ApplicationExit()
        Console.WriteLine("System Exit!")
        frmMain.Dispose()
        AdminInfo = Nothing
        Environment.Exit(0)
    End Sub

End Module
